<script>on mouseDownselect the clickLinewait until the mouse is upif the mouseLoc is not within rect of me thenselect emptyexit mouseDownend ifput word 2 of the clickLine into theLine-- put theLineput Line theLine of background field pp into CardNif CardN is empty then-- put "EMPTY"elseWTIgotoPage CardNend if--Put the Result & " [" & PICT &"]"end mouseDown</script>